home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / dev / misc / gms_joyports.lha / JoyPorts / JOY_Init.c next >
Encoding:
C/C++ Source or Header  |  1998-10-10  |  11.7 KB  |  413 lines
  1.  
  2. #define JP_MOUSE    0
  3. #define JP_JOYSTICK 1
  4. #define JP_ANALOGUE 2
  5. #define JP_JOYPAD   3
  6. #define JP_SEGAPAD  4
  7. #define JP_KEYBOARD 5
  8.  
  9. void ReadAnalogue(struct JoyData *JoyData);
  10. void ReadJoyPad(struct JoyData *JoyData);
  11. void ReadSegaPad(struct JoyData *JoyData);
  12. void ReadJoystick(struct JoyData *JoyData);
  13. void ReadKeyboard(struct JoyData *JoyData);
  14. void ReadMouse(struct JoyData *JoyData);
  15.  
  16. /***********************************************************************************/
  17.  
  18. void ReadAnalogue(struct JoyData *JoyData)
  19. {
  20.   ReadMouse(JoyData);
  21. }
  22.  
  23. /***********************************************************************************/
  24.  
  25. void ReadJoyPad(struct JoyData *JoyData)
  26. {
  27.   ReadJoystick(JoyData);
  28. }
  29.  
  30. /***********************************************************************************/
  31.  
  32. void ReadSegaPad(struct JoyData *JoyData)
  33. {
  34.   ReadJoystick(JoyData);
  35. }
  36.  
  37. /************************************************************************************
  38. ** This is the joystick emulator for the Keyboard.  It uses the Keyboard object
  39. ** to read the keys and compares them to the emulation keys set out by the user.
  40. ** I guess it is kind of slower than what might be preferred, but it is an emulator
  41. ** after all.
  42. **
  43. ** BUG/HACK - Using this method the program will actually interfere with the Task's
  44. ** use of the keyboard, so we should allow for a qualifier key from GMSPrefs
  45. ** and also prevent the key buffer position from moving.
  46. */
  47.  
  48. void ReadKeyboard(struct JoyData *JoyData)
  49. {
  50.    struct Keyboard *keys;
  51.    struct JoyKeys  *emu;
  52.    WORD  i;
  53.    WORD  qual;
  54.    UBYTE value;
  55.  
  56.    JoyData->XChange = NULL;
  57.    JoyData->YChange = NULL;
  58.    JoyData->ZChange = NULL;
  59.    JoyData->Buttons = NULL;
  60.  
  61.    if ((keys = JoyData->prvKeys) AND (emu = JoyData->prvEmu)) {
  62.       Query(keys);
  63.  
  64.       for (i = 0; i < keys->AmtRead; i++) {
  65.          qual  = keys->Buffer[i].Qualifier;
  66.  
  67.          if (qual & KQ_HELD) {
  68.             value = keys->Buffer[i].Value;
  69.  
  70.                  if (value IS emu->Left)  JoyData->XChange -= 1;
  71.             else if (value IS emu->Right) JoyData->XChange += 1;
  72.             else if (value IS emu->Up)    JoyData->YChange -= 1;
  73.             else if (value IS emu->Down)  JoyData->YChange += 1;
  74.             else if (value IS emu->Fire1) JoyData->Buttons |= JD_FIRE1;
  75.             else if (value IS emu->Fire2) JoyData->Buttons |= JD_FIRE2;
  76.             else if (value IS emu->Fire3) JoyData->Buttons |= JD_FIRE3;
  77.             else if (value IS emu->Fire4) JoyData->Buttons |= JD_FIRE4;
  78.             else if (value IS emu->Fire5) JoyData->Buttons |= JD_FIRE5;
  79.             else if (value IS emu->Fire6) JoyData->Buttons |= JD_FIRE6;
  80.             else if (value IS emu->Fire7) JoyData->Buttons |= JD_FIRE7;
  81.             else if (value IS emu->Fire8) JoyData->Buttons |= JD_FIRE8;
  82.          }
  83.       }
  84.    }
  85. }
  86.  
  87. /***********************************************************************************/
  88.  
  89. void ReadMouse(struct JoyData *JoyData)
  90. {
  91.    UWORD tmp;
  92.    WORD  X, Y;
  93.    LONG  buttons = NULL;
  94.  
  95.    /*** PORT 1 ***/
  96.  
  97.    if (JoyData->Port IS 1) {
  98.       tmp = custom->joy0dat;
  99.       X   = tmp & 0x00ff;
  100.       Y   = (tmp>>8);
  101.  
  102.       tmp = JoyData->prvOldX;
  103.       JoyData->prvOldX = X;
  104.       X -= tmp;
  105.  
  106.       tmp = JoyData->prvOldY;
  107.       JoyData->prvOldY = Y;
  108.       Y -= tmp;
  109.  
  110.       if (!(X > -127)) { X += 255; }
  111.       if (!(X < +127)) { X -= 255; }
  112.       if (!(Y > -127)) { Y += 255; }
  113.       if (!(Y < +127)) { Y -= 255; }
  114.  
  115.       tmp = custom->potinp;
  116.       if (!(cia->ciapra & (1<<6))) buttons |= JD_LMB;
  117.       if (!(tmp & (1<<10)))        buttons |= JD_RMB;
  118.       if (!(tmp & (1<<12)))        buttons |= JD_MMB; /* This is a guess... */
  119.    }
  120.  
  121.    /*** PORT 2 ***/
  122.  
  123.    else if (JoyData->Port IS 2) {
  124.       tmp = custom->joy1dat;
  125.       X   = tmp & 0x00ff;
  126.       Y   = (tmp>>8);
  127.       tmp = JoyData->prvOldX;
  128.       JoyData->prvOldX = X;
  129.       X  -= tmp;
  130.       tmp = JoyData->prvOldY;
  131.       JoyData->prvOldY = Y;
  132.       Y  -= tmp;
  133.  
  134.       if (!(X > -127)) { X += 255; }
  135.       if (!(X < +127)) { X -= 255; }
  136.       if (!(Y > -127)) { Y += 255; }
  137.       if (!(Y < +127)) { Y -= 255; }
  138.  
  139.       tmp = custom->potinp;
  140.       if (!(cia->ciapra & (1<<7))) buttons |= JD_LMB;
  141.       if (!(tmp & (1<<14)))        buttons |= JD_RMB; /* WRONG */
  142.       if (!(tmp & (1<<8)))         buttons |= JD_MMB; /* This is a guess... */
  143.    }
  144.  
  145.    /*** UNSUPPORTED PORT ***/
  146.  
  147.    else {
  148.       JoyData->XChange = NULL;
  149.       JoyData->YChange = NULL;
  150.       JoyData->ZChange = NULL;
  151.       JoyData->Buttons = NULL;
  152.       return;
  153.    }
  154.  
  155.    JoyData->XChange = X;
  156.    JoyData->YChange = Y;
  157.    JoyData->ZChange = NULL;
  158.    JoyData->Buttons = buttons;
  159. }
  160.  
  161. /***********************************************************************************/
  162.  
  163. void ReadJoystick(struct JoyData *JoyData)
  164. {
  165.    UWORD joy;
  166.    UWORD tmp;
  167.    LONG  buttons = NULL;
  168.  
  169.    tmp = custom->potinp;
  170.  
  171.    /*** PORT 1 ***/
  172.  
  173.    if (JoyData->Port IS 1) {
  174.       joy = custom->joy0dat;
  175.       if (!(cia->ciapra & (1<<6))) buttons |= JD_FIRE1;
  176.       if (!(tmp & (1<<10)))        buttons |= JD_FIRE2; /* WRONG */
  177.       if (!(tmp & (1<<14)))        buttons |= JD_FIRE3; /* This is a guess... */
  178.    }
  179.  
  180.    /*** PORT 2 ***/
  181.  
  182.    else if (JoyData->Port IS 2) {
  183.       joy = custom->joy1dat;
  184.       if (!(cia->ciapra & (1<<7))) buttons |= JD_FIRE1;
  185.       /*if (!(tmp & (1<<14)))*/    buttons |= JD_FIRE2; /* WRONG */
  186.       if (!(tmp & (1<<8)))         buttons |= JD_FIRE3; /* This is a guess... */
  187.    }
  188.  
  189.    /*** UNSUPPORTED PORT ***/
  190.  
  191.    else {
  192.       JoyData->XChange = NULL;
  193.       JoyData->YChange = NULL;
  194.       JoyData->ZChange = NULL;
  195.       JoyData->Buttons = NULL;
  196.       return;
  197.    }
  198.  
  199.    if (joy & 0x0002)      JoyData->XChange = 1;
  200.    else if (joy & 0x0200) JoyData->XChange = -1;
  201.    else JoyData->XChange = NULL;
  202.  
  203.    if ((joy >> 1^ joy) & 0x0001)      JoyData->YChange = 1;
  204.    else if ((joy >> 1^ joy) & 0x0100) JoyData->YChange = -1;
  205.    else JoyData->YChange = NULL;
  206.  
  207.    JoyData->Buttons = buttons;
  208. }
  209.  
  210. /************************************************************************************
  211. ** Action: Free()
  212. ** Object: JoyData
  213. */
  214.  
  215. LIBFUNC void JOY_Free(mreg(__a0) struct JoyData *JoyData)
  216. {
  217.   if (JoyData->prvKeys) {
  218.      Free(JoyData->prvKeys);
  219.   }
  220.   Public->OpenCount--;
  221. }
  222.  
  223. /************************************************************************************
  224. ** Action: Get()
  225. ** Object: JoyData
  226. */
  227.  
  228. LIBFUNC struct JoyData * JOY_Get(mreg(__a0) struct Stats *Stats)
  229. {
  230.   struct JoyData *JoyData;
  231.  
  232.   if (JoyData = AllocMemBlock(sizeof(struct JoyData), MEM_RESOURCED|Stats->MemFlags)) {
  233.      JoyData->Head.ID      = ID_JOYDATA;
  234.      JoyData->Head.Version = VER_JOYDATA;
  235.      Public->OpenCount++;
  236.      return(JoyData);
  237.   }
  238.   else {
  239.      ErrCode(ERR_FAILED);
  240.      return(NULL);
  241.   }
  242. }
  243.  
  244. /************************************************************************************
  245. ** Action: Init()
  246. ** Object: JoyData
  247. **
  248. ** Resets the timer and all of the values in the structure.
  249. */
  250.  
  251. LIBFUNC ECODE JOY_Init(mreg(__a0) struct JoyData *JoyData)
  252. {
  253.   struct DPKTask *Task;
  254.  
  255.   /* Note that we set mouse port as the system default if the
  256.   ** programmer has not set a port number.
  257.   */
  258.  
  259.   if (JoyData->Port IS JPORT_ANALOGUE) {
  260.      JoyData->Port = 1;
  261.   }
  262.   else if (JoyData->Port IS JPORT_DIGITAL) {
  263.      JoyData->Port = 2;
  264.   }
  265.   else if (JoyData->Port IS NULL) {
  266.      JoyData->Port = 1;
  267.   }
  268.   else if ((JoyData->Port < 1) OR (JoyData->Port > 4)) {
  269.      DPrintF("!Init:","JoyData port number is out of range (1 - 4).");
  270.      return(ERR_DATA);
  271.   }
  272.  
  273.   /* Set time-out values (micro-seconds) */
  274.  
  275.   if (JoyData->ButtonTimeOut IS NULL) {
  276.      JoyData->ButtonTimeOut = 200;
  277.   }
  278.  
  279.   if (JoyData->MoveTimeOut IS NULL) {
  280.      JoyData->MoveTimeOut = 200;
  281.   }
  282.  
  283.   /* Set the limits.  We also check that the sign of each setting
  284.   ** is correct.
  285.   */
  286.  
  287.   if (JoyData->NXLimit IS NULL) JoyData->NXLimit = -100;
  288.   if (JoyData->NYLimit IS NULL) JoyData->NYLimit = -100;
  289.   if (JoyData->PXLimit IS NULL) JoyData->PXLimit = +100;
  290.   if (JoyData->PYLimit IS NULL) JoyData->PYLimit = +100;
  291.  
  292.   if (JoyData->NXLimit > 0) JoyData->NXLimit = -JoyData->NXLimit;
  293.   if (JoyData->NYLimit > 0) JoyData->NYLimit = -JoyData->NYLimit;
  294.   if (JoyData->PXLimit < 0) JoyData->PXLimit = -JoyData->PXLimit;
  295.   if (JoyData->PYLimit < 0) JoyData->PYLimit = -JoyData->PYLimit;
  296.  
  297.   /* Find out what type of joystick is plugged in, this is
  298.   ** in accordance with the port number.
  299.   */
  300.  
  301.   if ((Task = FindDPKTask()) AND (Task->MasterPrefs)) {
  302.           if (JoyData->Port IS 1) JoyData->prvType = Task->MasterPrefs->JoyType1;
  303.      else if (JoyData->Port IS 2) JoyData->prvType = Task->MasterPrefs->JoyType2;
  304.      else if (JoyData->Port IS 3) JoyData->prvType = Task->MasterPrefs->JoyType3;
  305.      else if (JoyData->Port IS 4) JoyData->prvType = Task->MasterPrefs->JoyType4;
  306.   }
  307.   else {
  308.      DPrintF("JoyPorts:","Missing general preferences, using port default.");
  309.  
  310.      if (JoyData->Port IS 1)
  311.         JoyData->prvType = JP_MOUSE;
  312.      else
  313.         JoyData->prvType = JP_JOYSTICK;
  314.   }
  315.  
  316.   /* Initialise the port according to
  317.   ** what type it is.
  318.   */
  319.  
  320.   if (JoyData->prvType IS JP_MOUSE) {
  321.      ReadMouse(JoyData);
  322.      ReadMouse(JoyData);
  323.   }
  324.   else if (JoyData->prvType IS JP_KEYBOARD) {
  325.      if (!(JoyData->prvKeys = Init(Get(ID_KEYBOARD),NULL))) {
  326.         return(ERR_FAILED);
  327.      }
  328.      JoyData->prvEmu = Task->MasterPrefs->Keys + (JoyData->Port - 1);  /* Get emulation table */
  329.   }
  330.  
  331.   JoyData->Buttons = NULL;
  332.   JoyData->XChange = NULL;
  333.   JoyData->YChange = NULL;
  334.   JoyData->ZChange = NULL;
  335.  
  336.   DPrintF("JoyPorts:","Initialised to Port %d.",JoyData->Port);
  337.  
  338.   return(ERR_OK);
  339. }
  340.  
  341. /************************************************************************************
  342. ** Action: Activate()/Query()
  343. ** Object: JoyData
  344. */
  345.  
  346. LIBFUNC ECODE JOY_Activate(mreg(__a0) struct JoyData *JoyData)
  347. {
  348.         if (JoyData->prvType IS JP_MOUSE)    ReadMouse(JoyData);
  349.    else if (JoyData->prvType IS JP_JOYSTICK) ReadJoystick(JoyData);
  350.    else if (JoyData->prvType IS JP_ANALOGUE) ReadAnalogue(JoyData);
  351.    else if (JoyData->prvType IS JP_JOYPAD)   ReadJoyPad(JoyData);
  352.    else if (JoyData->prvType IS JP_SEGAPAD)  ReadSegaPad(JoyData);
  353.    else if (JoyData->prvType IS JP_KEYBOARD) ReadKeyboard(JoyData);
  354.    else return(ERR_FAILED);
  355.  
  356.    /* If there is no screen, or if this task does not have the focus, we
  357.    ** have to set the values to null and return.
  358.    **
  359.    ** The reason why we don't do this check first is because previously
  360.    ** some of the Read*() routines wanted to be constantly polled.
  361.    ** This is probably not be true anymore, but it needs to be thoroughly
  362.    ** tested if this code is to go first.
  363.    */
  364.  
  365.    if ((GVBase->CurrentScreen IS NULL) OR (GVBase->UserFocus != FindDPKTask())) {
  366.       JoyData->Buttons  = NULL;
  367.       JoyData->XChange  = NULL;
  368.       JoyData->YChange  = NULL;
  369.       JoyData->ZChange  = NULL;
  370.    }
  371.    else {
  372.       /* Check the movement ticks */
  373.  
  374.       if ((GVBase->Ticks - JoyData->prvMoveTicks) > (JoyData->MoveTimeOut/2)) {
  375.          DPrintF("JoyPorts:","Timeout - Ticks: %d, Int.Ticks: %d, Timeout: %d",GVBase->Ticks,JoyData->prvMoveTicks,JoyData->MoveTimeOut);
  376.          JoyData->XChange = NULL;
  377.          JoyData->YChange = NULL;
  378.          JoyData->ZChange = NULL;
  379.       }
  380.       else {
  381.          /* Check the X limits */
  382.  
  383.          if (JoyData->XChange < JoyData->NXLimit) {
  384.             JoyData->XChange = JoyData->NXLimit;
  385.          }
  386.          else if (JoyData->XChange > JoyData->PXLimit) {
  387.             JoyData->XChange = JoyData->PXLimit;
  388.          }
  389.  
  390.          /* Check the Y limits */
  391.  
  392.          if (JoyData->YChange < JoyData->NYLimit) {
  393.             JoyData->YChange = JoyData->NYLimit;
  394.          }
  395.          else if (JoyData->YChange > JoyData->PYLimit) {
  396.             JoyData->YChange = JoyData->PYLimit;
  397.          }
  398.       }
  399.  
  400.       /* Check the button ticks */
  401.  
  402.       if ((GVBase->Ticks - JoyData->prvButtonTicks) > (JoyData->ButtonTimeOut/2)) {
  403.          JoyData->Buttons = NULL;
  404.       }
  405.  
  406.    }
  407.  
  408.    JoyData->prvMoveTicks   = GVBase->Ticks;
  409.    JoyData->prvButtonTicks = GVBase->Ticks;
  410.    return(ERR_OK);
  411. }
  412.  
  413.